home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / Moscow ML 1.42 / e_SML / helpsigsmake.mac < prev    next >
Encoding:
Text File  |  1997-07-26  |  871 b   |  43 lines  |  [TEXT/Moml]
  1. (* helpsigsmake.mac *)
  2. (* 16Jul96  e *)
  3. (* 26Jul97  e -- 142 *)
  4.  
  5. (* after running Parser.grm through mosmlyac 
  6.    and running mosml with the command line...
  7.     :mosmllex.image :examples:helpsigs:Lexer.lex
  8. *)
  9.  
  10. load "Path";
  11. load "Process";
  12.  
  13. val home =
  14.   case Process.getEnv "PATH_TRANSLATED" of
  15.     SOME n => Path.dir n
  16.   | NONE => ":"
  17. ;
  18.  
  19. moolevel := 2;
  20.  
  21. let val base = home
  22. in
  23.   make "full" (base ^ "lib") [base ^ "src:compiler"]
  24.        (base ^ "examples:helpsigs")
  25. end;
  26.  
  27.  
  28. let val base = home
  29. in
  30.   chDir base;
  31.   link "makebase.image"
  32.        (true,true) (* -g -noheader *)
  33.        (true,"")   (* -autolink -P *)
  34.        (base ^ "lib")
  35.        [(base ^ "examples:helpsigs"),(base ^ "src:compiler")]
  36.        ["makebase.uo"]
  37. end;
  38.  
  39. (* now launch a copy of mosml with a command line, e.g.,:
  40.  
  41. makebase.image :lib: helpsigs.val index.txt index.tex htmlsigs :htmlsigs:idIndex.html
  42.  
  43. *)